BBS in a Box 12

home *** CD-ROM | disk | FTP | other *** search

/ BBS in a Box 12 / BBS in a box XII-1.iso / Files / Education / M / MathPad 2.15.sit / MathPad 2.15 / examples / vector ops < prev next >

MacBinary | 1993-06-13 | 1.4 KB | [TEXT/MPAD]

open in:

MacOS 8.1 extracted |

Win98 extracted |

DOS extracted

view JSON data |

view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: vector ops

Confidence	Program	Detection	Match Type	Support
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, Sun Jun 13 13:14:47 1993, modified Sun Jun 13 13:14:47 1993, creator 'MPAD', type ASCII, 816 bytes "vector ops" , at 0x3b0 342 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default

id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[MPAD]`

hex view

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0a 76 65 63 74 6f 72 | 20 6f 70 73 00 00 00 00 |..vector| ops....|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 41 | 44 00 00 00 00 00 00 00 |.TEXTMPA|D.......|
|00000050| 00 00 00 00 00 03 30 00 | 00 01 56 a8 41 11 07 a8 |......0.|..V.A...|
|00000060| 41 11 07 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |A.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 73 a6 00 00 |........|....s...|
|00000080| 2d 2d 20 41 72 72 61 79 | 73 20 63 61 6e 20 62 65 |-- Array|s can be|
|00000090| 20 75 73 65 64 20 74 6f | 20 72 65 70 72 65 73 65 | used to| represe|
|000000a0| 6e 74 20 76 65 63 74 6f | 72 73 2e 20 41 64 64 69 |nt vecto|rs. Addi|
|000000b0| 74 69 6f 6e 2c 20 73 75 | 62 74 72 61 63 74 69 6f |tion, su|btractio|
|000000c0| 6e 20 61 6e 64 20 6d 75 | 6c 74 69 70 6c 69 63 61 |n and mu|ltiplica|
|000000d0| 74 69 6f 6e 20 62 79 20 | 61 20 73 63 61 6c 61 72 |tion by |a scalar|
|000000e0| 20 63 61 6e 20 62 65 20 | 64 6f 6e 65 20 64 69 72 | can be |done dir|
|000000f0| 65 63 74 6c 79 2e 20 54 | 68 65 20 66 6f 6c 6c 6f |ectly. T|he follo|
|00000100| 77 69 6e 67 20 66 75 6e | 63 74 69 6f 6e 73 20 69 |wing fun|ctions i|
|00000110| 6d 70 6c 65 6d 65 6e 74 | 20 6f 74 68 65 72 20 62 |mplement| other b|
|00000120| 61 73 69 63 20 76 65 63 | 74 6f 72 20 6f 70 65 72 |asic vec|tor oper|
|00000130| 61 74 69 6f 6e 73 2e 0d | 0d 64 6f 74 28 41 2c 42 |ations..|.dot(A,B|
|00000140| 29 20 3d 20 73 75 6d 28 | 41 5b 69 5d 2a 42 5b 69 |) = sum(|A[i]*B[i|
|00000150| 5d 2c 69 2c 31 2c 63 6f | 75 6e 74 28 41 29 29 0d |],i,1,co|unt(A)).|
|00000160| 0d 6d 61 67 6e 69 74 75 | 64 65 28 41 29 20 3d 20 |.magnitu|de(A) = |
|00000170| 73 71 72 74 28 64 6f 74 | 28 41 2c 41 29 29 0d 0d |sqrt(dot|(A,A))..|
|00000180| 63 72 6f 73 73 28 41 2c | 42 29 20 3d 20 7b 41 5b |cross(A,|B) = {A[|
|00000190| 32 5d 2a 42 5b 33 5d 2d | 41 5b 33 5d 2a 42 5b 32 |2]*B[3]-|A[3]*B[2|
|000001a0| 5d 2c 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |],.     |        |
|000001b0| 20 41 5b 33 5d 2a 42 5b | 31 5d 2d 41 5b 31 5d 2a | A[3]*B[|1]-A[1]*|
|000001c0| 42 5b 33 5d 2c 0d 20 20 | 20 20 20 20 20 20 20 20 |B[3],.  |        |
|000001d0| 20 20 20 20 41 5b 31 5d | 2a 42 5b 32 5d 2d 41 5b |    A[1]|*B[2]-A[|
|000001e0| 32 5d 2a 42 5b 31 5d 7d | 0d 0d 2d 2d 20 63 61 72 |2]*B[1]}|..-- car|
|000001f0| 74 65 73 69 61 6e 20 74 | 6f 20 73 70 68 65 72 69 |tesian t|o spheri|
|00000200| 63 61 6c 20 63 6f 6f 72 | 64 69 6e 61 74 65 73 0d |cal coor|dinates.|
|00000210| 73 70 68 65 72 69 63 61 | 6c 28 41 29 20 3d 20 7b |spherica|l(A) = {|
|00000220| 6d 61 67 6e 69 74 75 64 | 65 28 41 29 2c 0d 20 20 |magnitud|e(A),.  |
|00000230| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 61 63 |        |      ac|
|00000240| 6f 73 28 41 5b 33 5d 2f | 6d 61 67 6e 69 74 75 64 |os(A[3]/|magnitud|
|00000250| 65 28 41 29 29 2c 0d 20 | 20 20 20 20 20 20 20 20 |e(A)),. |        |
|00000260| 20 20 20 20 20 20 20 61 | 74 61 6e 32 28 41 5b 32 |       a|tan2(A[2|
|00000270| 5d 2c 41 5b 31 5d 29 7d | 0d 0d 2d 2d 20 73 70 68 |],A[1])}|..-- sph|
|00000280| 65 72 69 63 61 6c 20 74 | 6f 20 63 61 72 74 65 73 |erical t|o cartes|
|00000290| 69 61 6e 20 63 6f 6f 72 | 64 69 6e 61 74 65 73 0d |ian coor|dinates.|
|000002a0| 63 61 72 74 65 73 69 61 | 6e 28 72 2c 74 68 65 74 |cartesia|n(r,thet|
|000002b0| 61 2c 70 68 69 29 20 3d | 20 7b 72 2a 73 69 6e 28 |a,phi) =| {r*sin(|
|000002c0| 74 68 65 74 61 29 2a 63 | 6f 73 28 70 68 69 29 2c |theta)*c|os(phi),|
|000002d0| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|000002e0| 20 20 20 20 20 20 20 20 | 20 20 20 72 2a 73 69 6e |        |   r*sin|
|000002f0| 28 74 68 65 74 61 29 2a | 73 69 6e 28 70 68 69 29 |(theta)*|sin(phi)|
|00000300| 2c 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |,.      |        |
|00000310| 20 20 20 20 20 20 20 20 | 20 20 20 20 72 2a 63 6f |        |    r*co|
|00000320| 73 28 74 68 65 74 61 29 | 20 7d 0d 0d 61 74 61 6e |s(theta)| }..atan|
|00000330| 32 28 79 2c 78 29 20 3d | 20 30 20 77 68 65 6e 20 |2(y,x) =| 0 when |
|00000340| 78 3d 30 20 61 6e 64 20 | 79 3d 30 2c 0d 20 20 20 |x=0 and |y=0,.   |
|00000350| 20 20 20 20 20 20 20 20 | 20 20 61 74 61 6e 28 79 |        |  atan(y|
|00000360| 2f 78 29 20 77 68 65 6e | 20 78 3e 3d 30 2c 0d 20 |/x) when| x>=0,. |
|00000370| 20 20 20 20 20 20 20 20 | 20 20 20 20 61 74 61 6e |        |    atan|
|00000380| 28 79 2f 78 29 2b 31 38 | 30 20 77 68 65 6e 20 79 |(y/x)+18|0 when y|
|00000390| 3e 3d 30 2c 0d 20 20 20 | 20 20 20 20 20 20 20 20 |>=0,.   |        |
|000003a0| 20 20 61 74 61 6e 28 79 | 2f 78 29 2d 31 38 30 0d |  atan(y|/x)-180.|
|000003b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000400| 00 00 01 00 00 00 01 24 | 00 00 00 24 00 00 00 32 |.......$|...$...2|
|00000410| 32 59 72 58 b7 5f 01 b0 | a8 a2 01 66 1e 20 1a 31 |2YrX._..|...f. .1|
|00000420| 20 1c c3 01 28 2b 6f 02 | 4a 05 66 6c 7f 20 1b 59 | ...(+o.|J.fl. .Y|
|00000430| 0a 76 65 63 74 6f 72 20 | 6f 70 73 01 02 00 00 00 |.vector |ops.....|
|00000440| 50 61 72 74 53 49 54 78 | 00 00 00 00 00 00 00 00 |PartSITx|........|
|00000450| 00 00 50 61 72 74 53 49 | 54 78 00 00 00 00 00 00 |..PartSI|Tx......|
|00000460| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000470| 00 00 a9 7e bd f0 00 00 | 00 00 00 00 01 56 20 17 |...~....|.....V .|
|00000480| 08 ff b9 20 38 02 f0 e3 | 88 d8 80 42 05 42 06 42 |... 8...|...B.B.B|
|00000490| 07 50 02 09 22 1a 00 98 | 03 a9 75 b8 9f 55 c0 13 |.P.."...|..u..U..|
|000004a0| 02 40 00 01 48 c0 01 1e | 00 50 01 09 12 56 e7 74 |.@..H...|.P...V.t|
|000004b0| 50 20 14 01 5d c0 20 23 | 02 1c 00 4a 05 6d d8 01 |P ..]. #|...J.m..|
|000004c0| 4a 07 ab 34 01 67 c0 34 | 02 66 20 4a 07 3f 01 70 |J..4.g.4|.f J.?.p|
|000004d0| 0a b3 57 03 ff 96 a9 71 | 4a 1f d6 7d 02 b0 6e ff |..W....q|J..}..n.|
|000004e0| 96 ab d4 01 ff b8 d9 02 | ff b8 67 28 20 1a 31 d9 |........|..g( .1.|
|000004f0| 01 ff b9 68 4f a6 20 18 | 7f 01 21 6e 54 02 00 4c |...hO. .|..!nT..L|
|00000500| 00 00 00 20 00 00 00 03 | 00 02 3f f9 8e fa 35 12 |... ....|..?...5.|
|00000510| 94 e9 c8 ae 01 39 00 e0 | 00 03 00 28 01 06 01 2c |.....9..|...(...,|
|00000520| 00 f8 00 28 00 00 01 00 | 00 00 01 24 00 00 00 24 |...(....|...$...$|
|00000530| 00 00 00 32 00 40 ba 1c | 03 ae 00 00 00 1c 00 32 |...2.@..|.......2|
|00000540| 00 00 50 52 65 66 00 00 | 00 0a 00 80 ff ff 00 00 |..PRef..|........|
|00000550| 00 00 00 41 62 ac 00 00 | 00 00 00 00 00 00 00 00 |...Ab...|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+